home *** CD-ROM | disk | FTP | other *** search
/ PC World 2003 March / PCWorld_2003-03_cd.bin / Software / Topware / activeperl / ActivePerl / Perl / eg / Windows Script Components / test.vbs < prev   
Encoding:
Text File  |  2000-08-10  |  284 b   |  16 lines
  1.  
  2.  
  3. Dim objTest
  4.  
  5. Set objTest = WScript.CreateObject("First.WSC")
  6.  
  7. MsgBox objTest.SayHello, vbInformation, "Test"
  8.  
  9. objTest.YourName = "world"
  10.  
  11. MsgBox objTest.SayHello, vbInformation, "Test"
  12.  
  13. objTest.YourName = "world again"
  14.  
  15. MsgBox objTest.SayHello, vbInformation, "Test"
  16.